inherited FrmCarta_Correcao: TFrmCarta_Correcao
  Left = 305
  Top = 166
  Caption = 'Carta de Corre'#231#227'o'
  ClientHeight = 449
  ClientWidth = 654
  OldCreateOrder = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Width = 654
    Height = 91
    object TLabel
      Left = 45
      Top = 64
      Width = 87
      Height = 14
      Caption = 'N'#250'mero da nota'
    end
    object BtnC_PedidoVenda: TSpeedButton
      Left = 211
      Top = 62
      Width = 23
      Height = 22
      Enabled = False
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
        333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
        C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
        F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
        F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
        00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
        3333333373FF7333333333333000333333333333377733333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
      OnClick = BtnC_PedidoVendaClick
    end
    object SerieNota: TLabel
      Left = 76
      Top = 41
      Width = 56
      Height = 14
      Caption = 'Nota S'#233'rie'
    end
    object LblEntidade: TLabel
      Left = 248
      Top = 65
      Width = 68
      Height = 19
      Caption = 'Entidade'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -16
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label3: TLabel
      Left = 65
      Top = 14
      Width = 67
      Height = 14
      Caption = 'Incorre'#231#245'es'
    end
    object EdtNota_numero: TEdit
      Left = 139
      Top = 62
      Width = 65
      Height = 22
      BevelKind = bkFlat
      BorderStyle = bsNone
      CharCase = ecLowerCase
      MaxLength = 9
      TabOrder = 2
      OnEnter = EdtNota_numeroEnter
      OnExit = EdtNota_numeroExit
      OnKeyDown = EdtNota_numeroKeyDown
    end
    object EdtSerie: TEdit
      Left = 139
      Top = 37
      Width = 38
      Height = 22
      BevelKind = bkFlat
      BorderStyle = bsNone
      CharCase = ecUpperCase
      MaxLength = 3
      TabOrder = 1
    end
    object Ed_tiponota: TRadioGroup
      Left = 139
      Top = 2
      Width = 238
      Height = 31
      BiDiMode = bdLeftToRight
      Columns = 2
      ItemIndex = 0
      Items.Strings = (
        'Sua Nota'
        'Nossa Nota Fiscal')
      ParentBiDiMode = False
      TabOrder = 0
      OnExit = Ed_tiponotaExit
    end
  end
  inherited Panel2: TPanel
    Top = 91
    Width = 654
    Height = 291
    object Label1: TLabel
      Left = 63
      Top = 196
      Width = 69
      Height = 14
      Caption = 'N'#186' de C'#243'pias'
    end
    object Label2: TLabel
      Left = 59
      Top = 223
      Width = 73
      Height = 14
      Caption = 'Data Emiss'#227'o'
    end
    object ListaEspecie: TCheckListBox
      Left = 3
      Top = 3
      Width = 648
      Height = 178
      Align = alTop
      BorderStyle = bsNone
      Color = clWhite
      Columns = 3
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ItemHeight = 16
      Items.Strings = (
        '01  Raz'#227'o Social'
        '02  Endere'#231'o'
        '03  Munic'#237'pio'
        '04  Estado'
        '05  N'#186' da Insc. no CNPJ/MF'
        '06  N'#186' da Insc. Estadual'
        '07  Natureza da Opera'#231#227'o'
        '08  C'#243'digo Fiscal da Opera'#231#227'o'
        '09  Via de Transporte'
        '10  Data de Emiss'#227'o'
        '11  Data da Sa'#237'da'
        '12  Unidade (produto)'
        '13  Quantidade (produto)'
        '14  Descri'#231#227'o dos Produtos'
        '15  Pre'#231'o Unit'#225'rio'
        '16  Valor do Produto'
        '17  Classifica'#231#227'o Fiscal'
        '18  Aliquota do IPI'
        '19  Valor do IPI'
        '20  Base de C'#225'lculo do IPI'
        '21  Valor Total da Nota'
        '22  Aliquota do ICM'
        '23  Valor do ICM'
        '24  Base de C'#225'lculo do ICM'
        '25  Nome do Transportador'
        '26  Endere'#231'o do Transportador'
        '27  Termo de Isen'#231#227'o IPI'
        '28  Termo de Isen'#231#227'o ICM'
        '29  Peso Bruto/L'#237'quido'
        '30  Vol/Esp./Marca/Num./Quant'
        '31  Rasuras'
        '32 Base de C'#225'lculo do ICMS Substitui'#231#227'o'
        '33 Valor do ICMS Substitui'#231#227'o'
        '34  Outros')
      ParentFont = False
      Style = lbOwnerDrawFixed
      TabOrder = 0
    end
    object BtnRetificacao: TBitBtn
      Left = 8
      Top = 248
      Width = 635
      Height = 37
      Caption = 'D e s c r e v e  r     R e t i f i c a '#231' '#245' e s'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -19
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      OnClick = BtnRetificacaoClick
    end
    object Ed_quantidade: TCurrencyEdit
      Left = 140
      Top = 192
      Width = 20
      Height = 21
      AutoSize = False
      DisplayFormat = '0'
      MaxLength = 1
      TabOrder = 1
    end
    object Ed_DataEmissao: TDateEdit
      Left = 140
      Top = 219
      Width = 121
      Height = 21
      NumGlyphs = 2
      TabOrder = 2
    end
    object ckbImprimeDaEmpresa: TCheckBox
      Left = 312
      Top = 221
      Width = 185
      Height = 17
      Caption = 'Imprimir Dados da Empresa'
      TabOrder = 4
    end
  end
  inherited Panel4: TPanel
    Top = 382
    Width = 654
    inherited btnGravar: TFlatButton
      Left = -79
      Top = 20
      TabOrder = 3
      Visible = False
    end
    inherited BtnEliminar: TFlatButton
      Left = -78
      Top = 24
      TabOrder = 4
      Visible = False
    end
    inherited btnCancelar: TFlatButton
      Left = 271
      TabOrder = 1
    end
    inherited btnlistagem: TFlatButton
      Left = 11
      Enabled = False
      TabOrder = 0
      OnClick = btnlistagemClick
    end
    inherited btnFechar: TFlatButton
      Left = 531
      TabOrder = 2
    end
  end
  inherited BS: TStatusBar
    Top = 430
    Width = 654
  end
  object PnlRetificacao: TPanel [4]
    Left = 884
    Top = 348
    Width = 654
    Height = 439
    TabOrder = 4
    Visible = False
    object DBGrid1: TDBGrid
      Left = 1
      Top = 1
      Width = 652
      Height = 399
      Align = alTop
      DataSource = dsRet
      Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnDblClick = DBGrid1DblClick
      OnKeyDown = DBGrid1KeyDown
      Columns = <
        item
          Expanded = False
          FieldName = 'especificacao'
          ReadOnly = True
          Width = 239
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Retificacao'
          Width = 375
          Visible = True
        end>
    end
    object BitBtn1: TBitBtn
      Left = 223
      Top = 407
      Width = 75
      Height = 25
      Caption = 'Confirmar'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      OnClick = BitBtn1Click
    end
    object BitBtn2: TBitBtn
      Left = 373
      Top = 407
      Width = 75
      Height = 25
      Caption = 'Cancelar'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 2
      OnClick = BitBtn2Click
    end
    object Panel3: TPanel
      Left = 343
      Top = 5
      Width = 246
      Height = 14
      BevelOuter = bvNone
      Caption = '[ Clique duas vezes na gride p/ editar o registro ]'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGray
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
    end
  end
  object pnl_Dados: TPanel [5]
    Left = 636
    Top = 66
    Width = 489
    Height = 271
    BevelInner = bvLowered
    BevelOuter = bvLowered
    BevelWidth = 2
    Color = clInfoBk
    TabOrder = 5
    Visible = False
    OnExit = pnl_DadosExit
    object Label4: TLabel
      Left = 64
      Top = 99
      Width = 32
      Height = 13
      Caption = 'Cliente'
    end
    object Label5: TLabel
      Left = 50
      Top = 125
      Width = 46
      Height = 13
      Caption = 'Endere'#231'o'
    end
    object Label6: TLabel
      Left = 13
      Top = 176
      Width = 83
      Height = 13
      Caption = 'Cidade do Cliente'
    end
    object Label7: TLabel
      Left = 75
      Top = 201
      Width = 21
      Height = 13
      Caption = 'CEP'
    end
    object Label8: TLabel
      Left = 248
      Top = 201
      Width = 14
      Height = 13
      Caption = 'UF'
    end
    object Label9: TLabel
      Left = 327
      Top = 201
      Width = 49
      Height = 13
      Caption = 'Data Nota'
    end
    object RxLabel1: TRxLabel
      Left = 24
      Top = 8
      Width = 225
      Height = 24
      Caption = 'Dados para carta avulsa'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -19
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label10: TLabel
      Left = 4
      Top = 74
      Width = 92
      Height = 13
      Caption = 'Cidade da Empresa'
    end
    object Label11: TLabel
      Left = 69
      Top = 150
      Width = 27
      Height = 13
      Alignment = taRightJustify
      Caption = 'Bairro'
    end
    object Label12: TLabel
      Left = 48
      Top = 46
      Width = 48
      Height = 13
      Alignment = taRightJustify
      Caption = 'Descri'#231#227'o'
    end
    object Ed_AvCliente: TEdit
      Left = 101
      Top = 96
      Width = 292
      Height = 21
      CharCase = ecUpperCase
      MaxLength = 40
      TabOrder = 2
    end
    object Ed_AvEndereco: TEdit
      Left = 101
      Top = 122
      Width = 372
      Height = 21
      CharCase = ecUpperCase
      MaxLength = 50
      TabOrder = 3
    end
    object Ed_AvCidade: TEdit
      Left = 101
      Top = 172
      Width = 292
      Height = 21
      CharCase = ecUpperCase
      MaxLength = 40
      TabOrder = 5
    end
    object Ed_AvUF: TEdit
      Left = 264
      Top = 197
      Width = 33
      Height = 21
      CharCase = ecUpperCase
      MaxLength = 2
      TabOrder = 7
      OnExit = Ed_AvUFExit
    end
    object Ed_AvData: TDateEdit
      Left = 381
      Top = 197
      Width = 92
      Height = 21
      NumGlyphs = 2
      TabOrder = 8
      OnExit = Ed_AvDataExit
    end
    object Ed_AvCep: TMaskEdit
      Left = 101
      Top = 197
      Width = 92
      Height = 21
      EditMask = '99\-999\-999;1;_'
      MaxLength = 10
      TabOrder = 6
      Text = '  -   -   '
    end
    object BitBtn3: TBitBtn
      Left = 67
      Top = 230
      Width = 161
      Height = 25
      Caption = 'Confirmar'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 9
      OnClick = BitBtn3Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
        03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
        0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
        0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
        0333337F777FFFFF7F3333000000000003333377777777777333}
      NumGlyphs = 2
    end
    object Ed_AvCidadeEmp: TEdit
      Left = 101
      Top = 70
      Width = 292
      Height = 21
      CharCase = ecUpperCase
      MaxLength = 40
      TabOrder = 1
    end
    object Ed_AvBairro: TEdit
      Left = 101
      Top = 147
      Width = 244
      Height = 21
      CharCase = ecUpperCase
      MaxLength = 30
      TabOrder = 4
    end
    object Ed_AvTiponota: TRadioGroup
      Left = 101
      Top = 35
      Width = 292
      Height = 31
      BiDiMode = bdLeftToRight
      Color = clWhite
      Columns = 2
      ItemIndex = 0
      Items.Strings = (
        'Sua Nota Fiscal'
        'Nossa Nota Fiscal')
      ParentBiDiMode = False
      ParentColor = False
      TabOrder = 0
    end
    object BitBtn4: TBitBtn
      Left = 283
      Top = 230
      Width = 161
      Height = 25
      Caption = 'Cancelar'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 10
      OnClick = BitBtn4Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333333333333333333333333333333FFF33FF333FFF339993370733
        999333777FF37FF377733339993000399933333777F777F77733333399970799
        93333333777F7377733333333999399933333333377737773333333333990993
        3333333333737F73333333333331013333333333333777FF3333333333910193
        333333333337773FF3333333399000993333333337377737FF33333399900099
        93333333773777377FF333399930003999333337773777F777FF339993370733
        9993337773337333777333333333333333333333333333333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
    end
  end
  inherited Timer1: TTimer
    Left = 593
    Top = 56
  end
  inherited RDP: TRDprint
    UsaGerenciadorImpr = True
    OnBeforeNewPage = RDPBeforeNewPage
    Left = 552
    Top = 57
  end
  object CdsRet: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 512
    Top = 56
    object CdsRetespecificacao: TStringField
      DisplayLabel = 'Especifica'#231#227'o'
      FieldName = 'especificacao'
      Size = 40
    end
    object CdsRetRetificacao: TStringField
      FieldName = 'Retificacao'
      Size = 2000
    end
  end
  object dsRet: TDataSource
    DataSet = CdsRet
    Left = 460
    Top = 56
  end
end
